home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 1995 December / PC Answers December 1995 (disc errors).iso / mxc / trout.dir / 00027_urbani.ls < prev    next >
Encoding:
Text File  |  1995-05-04  |  645 b   |  27 lines
  1. on mouseDown
  2.   global myLine, myLine2, gsliderbar, profileVid, csn, gExtraVid, auto, gAudBlrb, gmyLineKeep
  3.   if the doubleClick or (the timer < 120) then
  4.     beep()
  5.     exit
  6.   end if
  7.   set gmyLineKeep to myLine
  8.   set the castNum of sprite 8 to 37
  9.   repeat with i = 11 to 16
  10.     set the castNum of sprite i to i + 40
  11.   end repeat
  12.   if gAudBlrb = 1 then
  13.     set gAudBlrb to 0
  14.     set the castNum of sprite 9 to 29
  15.   end if
  16.   updateStage()
  17.   set the movieRate of sprite 24 to 0
  18.   set auto to 0
  19.   set profileVid to 1
  20.   set myLine to csn + gExtraVid
  21.   set palName to 205
  22.   set tpal to palName
  23.   puppetPalette(palName)
  24.   patchPal()
  25.   startTimer()
  26. end
  27.